Komputer for Alle 2001 #6/CD 6 (Black) - 2001.iso/K-CS.dcr/00039.ls

Text File | 2001-02-20 | 308 b | 20 lines

property Loops
global BlinkObjekt

on new me
  set Loops to 0
  cursor(0)
  set BlinkObject to 0
  set the locH of sprite 99 to 780
  set BlinkObjekt to new(script "Blink", 4, 80)
end

on exitFrame
  set Loops to Loops + 1
  if Loops > 5 then
    go(#next)
  end if
  checkBlink(BlinkObjekt)
  go(#loop)
end